home *** CD-ROM | disk | FTP | other *** search
/ Mac Easy 2010 May / Mac Life Ubuntu.iso / casper / filesystem.squashfs / usr / lib / perl / 5.10.0 / sys / socket.ph < prev    next >
Encoding:
Text File  |  2009-06-26  |  2.1 KB  |  45 lines
  1. require '_h2ph_pre.ph';
  2.  
  3. no warnings 'redefine';
  4.  
  5. unless(defined(&_SYS_SOCKET_H)) {
  6.     eval 'sub _SYS_SOCKET_H () {1;}' unless defined(&_SYS_SOCKET_H);
  7.     require 'features.ph';
  8.     require 'sys/uio.ph';
  9.     eval 'sub __need_size_t () {1;}' unless defined(&__need_size_t);
  10.     require 'stddef.ph';
  11.     if(defined(&__USE_GNU)) {
  12.     require 'bits/sigset.ph';
  13.     }
  14.     require 'bits/socket.ph';
  15.     if(defined(&__USE_BSD)) {
  16.     }
  17.     eval("sub SHUT_RD () { 0; }") unless defined(&SHUT_RD);
  18.     eval("sub SHUT_WR () { 1; }") unless defined(&SHUT_WR);
  19.     eval("sub SHUT_RDWR () { 2; }") unless defined(&SHUT_RDWR);
  20.     if(defined (defined(&__cplusplus) ? &__cplusplus : undef) || ! &__GNUC_PREREQ (2, 7) || !defined (defined(&__USE_GNU) ? &__USE_GNU : undef)) {
  21.     eval 'sub __SOCKADDR_ARG () {1;}' unless defined(&__SOCKADDR_ARG);
  22.     eval 'sub __CONST_SOCKADDR_ARG () { 1;}' unless defined(&__CONST_SOCKADDR_ARG);
  23.     } else {
  24.     eval 'sub __SOCKADDR_ALLTYPES () { &__SOCKADDR_ONETYPE ( &sockaddr)  &__SOCKADDR_ONETYPE ( &sockaddr_at)  &__SOCKADDR_ONETYPE ( &sockaddr_ax25)  &__SOCKADDR_ONETYPE ( &sockaddr_dl)  &__SOCKADDR_ONETYPE ( &sockaddr_eon)  &__SOCKADDR_ONETYPE ( &sockaddr_in)  &__SOCKADDR_ONETYPE ( &sockaddr_in6)  &__SOCKADDR_ONETYPE ( &sockaddr_inarp)  &__SOCKADDR_ONETYPE ( &sockaddr_ipx)  &__SOCKADDR_ONETYPE ( &sockaddr_iso)  &__SOCKADDR_ONETYPE ( &sockaddr_ns)  &__SOCKADDR_ONETYPE ( &sockaddr_un)  &__SOCKADDR_ONETYPE ( &sockaddr_x25);}' unless defined(&__SOCKADDR_ALLTYPES);
  25.     eval 'sub __SOCKADDR_ONETYPE {
  26.         my($type) = @_;
  27.             eval q(1;);
  28.     }' unless defined(&__SOCKADDR_ONETYPE);
  29.     undef(&__SOCKADDR_ONETYPE) if defined(&__SOCKADDR_ONETYPE);
  30.     eval 'sub __SOCKADDR_ONETYPE {
  31.         my($type) = @_;
  32.             eval q( 1;);
  33.     }' unless defined(&__SOCKADDR_ONETYPE);
  34.     undef(&__SOCKADDR_ONETYPE) if defined(&__SOCKADDR_ONETYPE);
  35.     }
  36.     if(defined(&__USE_XOPEN2K)) {
  37.     }
  38.     if(defined(&__USE_MISC)) {
  39.     }
  40.     if((defined(&__USE_FORTIFY_LEVEL) ? &__USE_FORTIFY_LEVEL : undef) > 0 && defined (defined(&__extern_always_inline) ? &__extern_always_inline : undef)) {
  41.     require 'bits/socket2.ph';
  42.     }
  43. }
  44. 1;
  45.